home *** CD-ROM | disk | FTP | other *** search
- object Form12: TForm12
- Left = 51
- Top = 104
- BorderStyle = bsDialog
- Caption = 'Event'
- ClientHeight = 272
- ClientWidth = 451
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel2: TPanel
- Left = 8
- Top = 10
- Width = 437
- Height = 219
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label1: TLabel
- Left = 130
- Top = 46
- Width = 27
- Height = 13
- Alignment = taRightJustify
- Caption = 'Type:'
- end
- object Label2: TLabel
- Left = 131
- Top = 70
- Width = 26
- Height = 13
- Alignment = taRightJustify
- Caption = 'Date:'
- end
- object Label4: TLabel
- Left = 135
- Top = 118
- Width = 22
- Height = 13
- Alignment = taRightJustify
- Caption = 'Age:'
- end
- object Label5: TLabel
- Left = 57
- Top = 142
- Width = 100
- Height = 13
- Alignment = taRightJustify
- Caption = 'Responsible Agency:'
- end
- object Label6: TLabel
- Left = 82
- Top = 166
- Width = 75
- Height = 13
- Alignment = taRightJustify
- Caption = 'Cause of event:'
- end
- object Label3: TLabel
- Left = 17
- Top = 14
- Width = 141
- Height = 13
- Alignment = taRightJustify
- Caption = 'Scholastic Achievement:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 127
- Top = 94
- Width = 30
- Height = 13
- Alignment = taRightJustify
- Caption = 'Place:'
- end
- object Label8: TLabel
- Left = 120
- Top = 190
- Width = 37
- Height = 13
- Alignment = taRightJustify
- Caption = 'Source:'
- end
- object Edit1: TEdit
- Left = 160
- Top = 42
- Width = 177
- Height = 21
- MaxLength = 90
- TabOrder = 1
- end
- object Edit2: TEdit
- Left = 160
- Top = 66
- Width = 97
- Height = 21
- MaxLength = 35
- TabOrder = 2
- end
- object ComboBox1: TComboBox
- Left = 160
- Top = 114
- Width = 89
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- 'CHILD'
- 'INFANT'
- 'STILLBORN')
- TabOrder = 4
- end
- object Edit3: TEdit
- Left = 160
- Top = 138
- Width = 265
- Height = 21
- MaxLength = 120
- TabOrder = 5
- end
- object Edit4: TEdit
- Left = 160
- Top = 162
- Width = 265
- Height = 21
- MaxLength = 120
- TabOrder = 6
- end
- object Edit5: TEdit
- Left = 160
- Top = 10
- Width = 265
- Height = 21
- MaxLength = 90
- TabOrder = 0
- end
- object Edit6: TEdit
- Left = 160
- Top = 90
- Width = 265
- Height = 21
- MaxLength = 120
- TabOrder = 3
- Text = 'Edit6'
- end
- object Edit7: TEdit
- Left = 160
- Top = 186
- Width = 265
- Height = 21
- MaxLength = 120
- TabOrder = 7
- Text = 'Edit7'
- end
- end
- object Button1: TButton
- Left = 270
- Top = 239
- Width = 84
- Height = 26
- Caption = 'OK'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 358
- Top = 239
- Width = 84
- Height = 26
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Button2Click
- end
- end
-